#!/usr/bin/perl
$flag="a";
while(1){
	print "$flag\n";
	$flag++;
}